(ns pe.p67
  (:use pe.files)
  (:use pe.trianglepath))

(defn load-triangle [fname]
  (let [strings (read-lines fname)]
    (vec (for [s strings] (vec (map #(Integer/valueOf %) (vec (.split #" " s))))))))

(def big-triangle (load-triangle "triangle.txt"))
(println (apply max ((maximums big-triangle 1) (dec (count big-triangle)))))